home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 11 / Cream of the Crop 11-2.iso / os2 / os2cl015.zip / pmdlg.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1995-11-24  |  11.4 KB  |  502 lines
  1. /* 
  2.  
  3.  
  4.     pmdlg.cpp (emx+gcc) 
  5.  
  6.     1994,95 Giovanni Iachello
  7.     This is freeware software. You can use or modify it as you wish,
  8.     provided that the part of code that I wrote remains freeware.
  9.     Freeware means that the source code must be available on request 
  10.     to anyone.
  11.     You must also include this notice in all files derived from this
  12.     file.
  13.  
  14.  
  15. */
  16. #include <stdio.h>
  17. #include <stdlib.h>
  18. #include <string.h>
  19.  
  20. #define INCL_WINMLE
  21. #include "pmwin.h"
  22. #include "pmdlg.h"
  23. #include "pmstdres.h"
  24.  
  25. /////////////////////////////////////////////////////////////////////////////
  26.  
  27. MRESULT PMDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
  28. {
  29.     PMDialog* win=NULL;
  30.     if (msg==WM_INITDLG) {
  31.         win=(PMDialog*)mp2;
  32.         if (win) { 
  33.             WinSetWindowPtr(hwnd,0,win);
  34.             win->hwnd=hwnd;                  // e naturalmente aggiorna hwnd ... ;)
  35.             win->hwndFrame=hwnd;
  36.             win->init();
  37.             win->initdlg();
  38.             return (MRESULT)TRUE;               // if focus changed
  39.         }
  40.     }
  41.  
  42.     win = (PMDialog*)WinQueryWindowPtr(hwnd, 0);
  43.     if (win) {
  44.         PMEvent event(msg,mp1,mp2,CHARMSG(&msg),MOUSEMSG(&msg));
  45.         return win->msgProc(event);
  46.     }
  47.     return WinDefDlgProc(hwnd,msg,mp1,mp2);
  48. }
  49.  
  50.  
  51. /////////////////////////////////////////////////////////////////////////////
  52.  
  53. PMControl::PMControl(HWND parentDlg,void* iobj,int ilen,int iid) :
  54.     PMWin(WinQueryAnchorBlock(parentDlg))
  55. {
  56.     hwndFrame=parentDlg; obj=iobj; len=ilen; id=iid;
  57.     hwnd=WinWindowFromID(hwndFrame,id);
  58.     // in realta' questo e' solo accessorio perche' non serve al sistema
  59.     // inoltre nota che molti controlli (MLE...) non non hanno spazio
  60.     // per questo dato.
  61.     WinSetWindowPtr(hwnd,0,this); // okkey
  62. }
  63.  
  64. BOOL PMControl::destroyWin()
  65. {
  66.     return WinDestroyWindow(hwnd);
  67. }
  68.  
  69. /////////////////////////////////////////////////////////////////////////////
  70.  
  71. PMButton::PMButton(HWND parentDlg,void* iobj,int ilen,int iid) :
  72.     PMControl(parentDlg,iobj,ilen,iid) 
  73. {
  74. }
  75.  
  76. void PMButton::get() 
  77. { 
  78. }
  79.  
  80. void PMButton::set() 
  81. { 
  82. }
  83.  
  84. /////////////////////////////////////////////////////////////////////////////
  85.  
  86. PMRadioButtonGroup::PMRadioButtonGroup(HWND parentDlg,void* iobj,int ilen,int iid) :
  87.     PMButton(parentDlg,iobj,ilen,iid) 
  88. {
  89. }
  90.  
  91. void PMRadioButtonGroup::get() 
  92. { 
  93.     int ret=queryIndex();
  94.     *((int*)obj)=ret;
  95. }
  96.  
  97. void PMRadioButtonGroup::set() 
  98. { 
  99.     HWND hwndctrl=WinWindowFromID(hwndFrame,id+(*(int*)obj)); // trova hwnd del controllo da attivare
  100.     WinSendMsg(hwndctrl,BM_SETCHECK,(MPARAM)1,(MPARAM)0);
  101. }
  102.  
  103. /////////////////////////////////////////////////////////////////////////////
  104.  
  105. PMCheckBox::PMCheckBox(HWND parentDlg,void* iobj,int ilen,int iid) :
  106.     PMButton(parentDlg,iobj,ilen,iid) 
  107. {
  108. }
  109.  
  110. void PMCheckBox::get() 
  111. { 
  112.     int ret=queryCheck();
  113.     *((int*)obj)=ret;
  114. }
  115.  
  116. void PMCheckBox::set() 
  117. { 
  118.     setCheck(*((int*)obj));
  119. }
  120.  
  121. /////////////////////////////////////////////////////////////////////////////
  122.  
  123. PMEntryField::PMEntryField(HWND parentDlg,void* iobj,int ilen,int iid) :
  124.     PMControl(parentDlg,iobj,ilen,iid) 
  125. { 
  126.     WinSendDlgItemMsg(hwndFrame,id,EM_SETTEXTLIMIT,MPFROMSHORT(len),0);
  127. }
  128.  
  129. void PMEntryField::get() 
  130. { 
  131.     WinQueryDlgItemText(hwndFrame,id,len,(PSZ)obj);
  132. }
  133.  
  134. void PMEntryField::set() 
  135. { 
  136.     WinSetDlgItemText(hwndFrame,id,(PSZ)obj);
  137. }
  138.  
  139. /////////////////////////////////////////////////////////////////////////////
  140.  
  141. PMMultiLineEdit::PMMultiLineEdit(HWND parentDlg,void* iobj,int ilen,int iid) :
  142.     PMControl(parentDlg,iobj,ilen,iid) 
  143. { 
  144.     WinSendDlgItemMsg(hwndFrame,id,MLM_SETTEXTLIMIT,MPFROMSHORT(len),0);
  145. }
  146.  
  147. void PMMultiLineEdit::get() 
  148. { 
  149.     WinQueryDlgItemText(hwndFrame,id,len,(PSZ)obj);
  150. }
  151.  
  152. void PMMultiLineEdit::set() 
  153. { 
  154.     WinSetDlgItemText(hwndFrame,id,(PSZ)obj);
  155. }
  156.  
  157. ////////////////////////////////////////////////////////////////////////////
  158.  
  159. PMListBox::PMListBox(HWND parentDlg,void* iobj,int ilen,int iid) :
  160.     PMControl(parentDlg,iobj,ilen,iid) 
  161. { 
  162. }
  163.  
  164. PMListBox::~PMListBox()
  165. {
  166. }
  167.  
  168. void PMListBox::get()
  169. {
  170.     ULONG ret=(ULONG)WinSendMsg(hwnd,LM_QUERYSELECTION,MPFROMLONG(LIT_FIRST),(MPARAM)NULL);
  171.     *((int*)obj)=ret;
  172. }
  173.  
  174. void PMListBox::set()
  175. {
  176.     WinSendMsg(hwnd,LM_SELECTITEM,MPFROMLONG(*((int*)obj)),(MPARAM)NULL);
  177. }
  178.  
  179. ////////////////////////////////////////////////////////////////////////////
  180.  
  181. PMValueSet::PMValueSet(HWND parentDlg,void* iobj,int ilen,int iid) :
  182.     PMControl(parentDlg,iobj,ilen,iid) 
  183. { 
  184. }
  185.  
  186. void PMValueSet::get()
  187. {
  188.     MRESULT ret=querySelectedItem();
  189.     *((MRESULT*)obj)=ret;
  190. }
  191.  
  192. void PMValueSet::set()
  193. {
  194.     selectItem(*(MPARAM*)obj);
  195. }
  196.  
  197. ////////////////////////////////////////////////////////////////////////////
  198.  
  199. PMSpinButton::PMSpinButton(HWND parentDlg,void* iobj,int ilen,int iid) :
  200.     PMControl(parentDlg,iobj,ilen,iid) 
  201. { 
  202. }
  203.  
  204. void PMSpinButton::get()
  205. {
  206.     queryValue((PVOID)obj,0,SPBQ_ALWAYSUPDATE);
  207. }
  208.  
  209. void PMSpinButton::set()
  210. {
  211.     setCurrentValue(*(LONG*)obj);
  212. }
  213.  
  214. ////////////////////////////////////////////////////////////////////////////
  215.  
  216. PMScrollBar::PMScrollBar(HWND parentDlg, void* iobj, int ilen, int iid) :
  217.     PMControl(parentDlg,iobj,ilen,iid)
  218. {
  219. }
  220.  
  221. PMScrollBar::PMScrollBar(PMWin* win, int* iobj, int iid)    :
  222.     PMControl(win->getHwndFrame(),iobj,4,iid)
  223. {
  224. }
  225.  
  226. void PMScrollBar::get()
  227. {
  228.     *(int*)obj=int(queryPos());
  229. }
  230.  
  231. void PMScrollBar::set()
  232. {
  233.     setPos(SHORT(*(int*)obj));
  234. }
  235.  
  236. PMVertScrollBar::PMVertScrollBar(PMWin* win, int* iobj) :
  237.     PMScrollBar(win,iobj,FID_VERTSCROLL)
  238. {
  239. }
  240.  
  241. PMHorizScrollBar::PMHorizScrollBar(PMWin* win, int* iobj) :
  242.     PMScrollBar(win,iobj,FID_HORZSCROLL)
  243. {
  244. }
  245.  
  246.  
  247. /////////////////////////////////////////////////////////////////////////////
  248.  
  249. PMDialog::PMDialog(HWND p,HWND o) : PMWin("",WinQueryAnchorBlock(o)) // chiama il costruttore complesso che riempie createargs
  250. {
  251.     createArgs->hwndParent=p;
  252.     createArgs->hwndOwner=o;
  253.     createArgs->hmod=NULLHANDLE;    
  254. }
  255.  
  256. PMDialog::~PMDialog()
  257. {
  258. }
  259.  
  260. void PMDialog::init()
  261. {
  262. }
  263.  
  264. BOOL PMDialog::createWin()
  265. {
  266.     return FALSE;
  267. }
  268.  
  269. BOOL PMDialog::destroyWin()
  270. {
  271.     return WinDismissDlg(hwnd,FALSE);
  272. }
  273.  
  274.  
  275. BOOL PMDialog::dispachEvent(PMEvent & event)
  276. {
  277.     switch (event.msg) {
  278.         case WM_CONTROL: 
  279.             return control(SHORT1FROMMP(event.mp1),SHORT2FROMMP(event.mp1));
  280.         case WM_INITDLG:
  281.             return initdlg();
  282.     }               
  283.     return PMWin::dispachEvent(event);
  284. }
  285.  
  286. BOOL PMDialog::control(SHORT id,SHORT ctrlmsg)
  287. {
  288.     return FALSE;
  289. }    
  290.  
  291. BOOL PMDialog::initdlg()
  292. {
  293.     return FALSE;
  294. }    
  295.  
  296. BOOL PMDialog::command(USHORT id,USHORT cmddev)
  297. {
  298.     return FALSE;
  299. }    
  300.  
  301. /////////////////////////////////////////////////////////////////////////////
  302.  
  303. PMModalDialog::PMModalDialog(HWND p,HWND o,ULONG i,PMControlMap *icm,void* iobj) : 
  304.     PMDialog(p,o)
  305. {
  306.     id=i;
  307.     cm=icm;
  308.     obj=iobj;
  309.     delctlmap=FALSE;
  310. }
  311.  
  312. PMControl* PMModalDialog::controlFromID(int id)
  313. { 
  314.     PMControl* ctl;
  315.     ctl=(PMControl*)WinQueryWindowPtr(WinWindowFromID(hwnd,id),0); 
  316.     if (!ctl) {
  317.         PMControlMap* pcm=cm;
  318.         for ( ; pcm->createfn!=NULL; pcm++ ) 
  319.             if (pcm->id == id) { ctl=pcm->ctrl;    break; }
  320.     }
  321.     assert(ctl);
  322.     return ctl;
  323. }
  324.  
  325. PMModalDialog::~PMModalDialog()
  326. {
  327.     if (delctlmap) {
  328.         PMControlMap* pcm=cm;
  329.         for ( ; pcm->createfn!=NULL; pcm++ ) {
  330.             delete pcm->ctrl; // elimina i controlli creati...
  331.         }
  332.         delctlmap=FALSE;
  333.     }
  334. }
  335.  
  336. void PMModalDialog::init()
  337. {
  338.     PMControlMap* pcm=cm;
  339.     for ( ; pcm->createfn!=NULL; pcm++ ) {
  340.         PMControl* ctl=pcm->createfn(hwnd,(char*)obj+pcm->offset,pcm->len,pcm->id);
  341.         assert(ctl);
  342.         ctl->set(); // imposta sullo schermo
  343.         pcm->ctrl=ctl; // salva anche nella mappa dei controlli
  344.     }
  345.     delctlmap=TRUE;
  346.     WinSetFocus(HWND_DESKTOP,WinWindowFromID(hwnd,pcm->id));
  347. }    
  348.  
  349. void PMModalDialog::updateControls()
  350. {
  351.     PMControlMap* pcm=cm;
  352.     for ( ; pcm->createfn!=NULL; pcm++ ) {
  353.         pcm->ctrl->set(); // imposta sullo schermo
  354.     }
  355. }
  356.  
  357. void PMModalDialog::updateObject()
  358. {
  359.     PMControlMap* pcm=cm;
  360.     for ( ; pcm->createfn!=NULL; pcm++ ) {
  361.         pcm->ctrl->get(); // imposta nella struttura
  362.     }
  363. }
  364.  
  365. BOOL PMModalDialog::createWin()
  366. {
  367.     oldproc=WinDefDlgProc;
  368.     ULONG ret=WinDlgBox(createArgs->hwndParent,createArgs->hwndOwner,PMDlgProc,createArgs->hmod,id,this);
  369.     return ret;
  370. }
  371.  
  372. BOOL PMModalDialog::command(USHORT id,USHORT cmddev)
  373. {
  374.     if (id==DID_OK) {
  375.         WinDismissDlg(hwnd,TRUE);
  376.         updateObject();        
  377.     }
  378.     if (id==DID_CANCEL) WinDismissDlg(hwnd,FALSE);
  379.     return TRUE;
  380. }    
  381.  
  382. BOOL PMModelessDialog::createWin()
  383. {
  384.     oldproc=WinDefDlgProc;
  385.     ULONG ret=WinLoadDlg(createArgs->hwndParent,createArgs->hwndOwner,PMDlgProc,createArgs->hmod,id,this);
  386.     return ret;
  387. }
  388.     
  389.  
  390. /////////////////////////////////////////////////////////////////////////////
  391.  
  392. PMFontDialog::PMFontDialog(HWND parent,HWND owner,FONTMETRICS *ifm,ULONG type,PSZ title,PSZ preview) : 
  393.     PMDialog(parent,owner) 
  394. {
  395.     fm=ifm;
  396.     memset((void*)&fontdlg, 0 , sizeof(FONTDLG));
  397.     fontdlg.flType= type;
  398.     fontdlg.pszTitle=title;
  399.     fontdlg.pszPreview=preview;
  400.     fontdlg.pszFamilyname=new CHAR[CCHMAXPATH]; // alloca zpazio per il nome della famiglia
  401. }
  402.  
  403. PMFontDialog::~PMFontDialog()
  404. {
  405.     delete fontdlg.pszFamilyname;
  406. }
  407.  
  408. BOOL PMFontDialog::createWin()
  409. {
  410.     fontdlg.cbSize=sizeof(FONTDLG);
  411.     fontdlg.hpsScreen = WinGetScreenPS(HWND_DESKTOP);
  412.     fontdlg.hpsPrinter= NULLHANDLE;
  413.     fontdlg.pfnDlgProc= PMFontDlgProc; 
  414.     fontdlg.ulUser= (ULONG)this;
  415.  
  416.     strcpy (fontdlg.pszFamilyname,fm->szFamilyname);
  417.     fontdlg.usFamilyBufLen=CCHMAXPATH;
  418.     fontdlg.fxPointSize= MAKEFIXED (fm->sNominalPointSize / 10 , 0);
  419.     fontdlg.fl= FNTS_CENTER | FNTS_HELPBUTTON | FNTS_NOSYNTHESIZEDFONTS | FNTS_RESETBUTTON;
  420.     fontdlg.clrFore=CLR_NEUTRAL;
  421.     fontdlg.clrBack=CLR_BACKGROUND;
  422.     fontdlg.usWeight=fm->usWeightClass;
  423.     fontdlg.usWidth=fm->usWidthClass;
  424.  
  425.     oldproc=WinDefFontDlgProc;
  426.  
  427.     WinFontDlg (createArgs->hwndParent,createArgs->hwndOwner, &fontdlg);
  428.     return fontdlg.lReturn;
  429. }
  430.  
  431. MRESULT PMFontDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
  432. {
  433.     PFONTDLG fdlg;
  434.     PMFontDialog* win=NULL;  // il puntatore alla struttura fontdlg e' in WinPtr 0.
  435.  
  436.     fdlg = (PFONTDLG)WinQueryWindowPtr(hwnd, 0);
  437.     win = (PMFontDialog*) fdlg->ulUser;
  438.     if (win) {
  439.         if (msg==WM_INITDLG) {
  440.             win->hwnd=hwnd;                  // e naturalmente aggiorna hwnd ... ;)
  441.             win->hwndFrame=hwnd;
  442.             win->init();
  443.         }
  444.         PMEvent event(msg,mp1,mp2,CHARMSG(&msg),MOUSEMSG(&msg));
  445.         return win->msgProc(event);
  446.     }
  447.     return WinDefFontDlgProc(hwnd,msg,mp1,mp2);
  448. }
  449.  
  450.  
  451. /////////////////////////////////////////////////////////////////////////////
  452.  
  453. PMFileDialog::PMFileDialog(HWND parent,HWND owner,PSZ file,PSZ title,PSZ OKButton,ULONG flags) : 
  454.     PMDialog(parent,owner) 
  455. {
  456.     memset((void*)&filedlg, 0 , sizeof(FILEDLG));
  457.     filedlg.pszTitle=title;
  458.     filedlg.pszOKButton=OKButton;
  459.     filedlg.fl=flags;
  460.     strncpy(filedlg.szFullFile,file,CCHMAXPATH);
  461. }
  462.  
  463. PMFileDialog::~PMFileDialog()
  464. {
  465. }
  466.  
  467. BOOL PMFileDialog::createWin()
  468. {
  469.     filedlg.cbSize=sizeof(FILEDLG);
  470.     filedlg.pfnDlgProc= PMFileDlgProc; 
  471.     filedlg.ulUser= (ULONG)this;
  472.     filedlg.fl|= FDS_CENTER | FDS_PRELOAD_VOLINFO ;
  473.     filedlg.pszIDrive="C:";
  474.  
  475.     oldproc=WinDefFileDlgProc;
  476.     
  477.     WinFileDlg (createArgs->hwndParent,createArgs->hwndOwner, &filedlg);
  478.     return filedlg.lReturn;
  479. }
  480.  
  481. MRESULT PMFileDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
  482. {
  483.     PFILEDLG fdlg;
  484.     PMFileDialog* win=NULL;  // il puntatore alla struttura fontdlg e' in WinPtr 0.
  485.  
  486.     fdlg = (PFILEDLG)WinQueryWindowPtr(hwnd, 0);
  487.     win = (PMFileDialog*) fdlg->ulUser;
  488.     if (win) {
  489.         if (msg==WM_INITDLG) {
  490.             win->hwnd=hwnd;                  // e naturalmente aggiorna hwnd ... ;)
  491.             win->hwndFrame=hwnd;
  492.             win->init();
  493.         }
  494.         PMEvent event(msg,mp1,mp2,CHARMSG(&msg),MOUSEMSG(&msg));
  495.         return win->msgProc(event);
  496.     }
  497.     return WinDefFileDlgProc(hwnd,msg,mp1,mp2);
  498. }
  499.  
  500.  
  501.  
  502.